Show AllReturns or sets the location of the summary rows in the outline. Read/write XlSummaryRow.
| XlSummaryRow can be one of these XlSummaryRow constants. |
| xlSummaryBelow. The summary row will be positioned below the detail rows in the outline. |
| xlSummaryAbove. The summary row will be positioned above the detail rows in the outline. |
expression.SummaryRow
expression Required. An expression that returns one of the objects in the Applies To list.
Set SummaryRow to xlAbove for Microsoft Word-style outlines, where category headers are above the detailed information. Set SummaryRow to xlBelow for accounting-style outlines, where summations are below the detailed information.
This example creates an outline with automatic styles, with the summary row above the detail rows, and with the summary column to the right of the detail columns.
Worksheets("Sheet1").Activate
Selection.AutoOutline
With ActiveSheet.Outline
.SummaryRow = xlAbove
.SummaryColumn = xlRight
.AutomaticStyles = True
End With